home *** CD-ROM | disk | FTP | other *** search
/ EIDOS Interactive Digital Press Kit ECTS 1997 / EIDOS Digital Press Kit - ECTS 1997 - Disc 2.iso / pc / mmenu.dir / Internal_70.ls < prev    next >
Encoding:
Text File  |  1997-08-29  |  841 b   |  36 lines
  1. on selectlang
  2.   global lan
  3.   if lan = "e" then
  4.     set the visible of sprite 41 to 0
  5.     set the visible of sprite 40 to 0
  6.   else
  7.     nothing()
  8.   end if
  9.   if lan = "f" then
  10.     set the visible of sprite 41 to 1
  11.     set the visible of sprite 40 to 0
  12.     puppetSprite(43, 1)
  13.     set the memberNum of sprite 43 to 241
  14.     puppetSprite(46, 1)
  15.     set the memberNum of sprite 46 to 244
  16.     puppetSprite(47, 1)
  17.     set the memberNum of sprite 47 to 245
  18.     updateStage()
  19.   else
  20.     nothing()
  21.   end if
  22.   if lan = "g" then
  23.     set the visible of sprite 41 to 0
  24.     set the visible of sprite 40 to 1
  25.     puppetSprite(43, 1)
  26.     set the memberNum of sprite 43 to 231
  27.     puppetSprite(46, 1)
  28.     set the memberNum of sprite 46 to 234
  29.     puppetSprite(47, 1)
  30.     set the memberNum of sprite 47 to 235
  31.     updateStage()
  32.   else
  33.     nothing()
  34.   end if
  35. end
  36.